home *** CD-ROM | disk | FTP | other *** search
- 10 REM ********************************
- 12 REM * *
- 14 REM * H E L P 6 4 *
- 16 REM * ----------------------- *
- 18 REM * *
- 20 REM * PROGRAM 2 : SCREEN GENERATOR *
- 22 REM * *
- 24 REM * THIS PROGRAM WILL DISPLAY *
- 26 REM * AND WRITE EACH OF THE 10 *
- 28 REM * HELP SCREENS TO DISK. *
- 30 REM * *
- 32 REM * *
- 34 REM * COPYRIGHT (C) ANDREW LEEDER, *
- 36 REM * DECEMBER 1988. *
- 38 REM * *
- 40 REM ********************************
- 50 :
- 100 OPEN1,8,2," H.SCREENS,P,W":PRINT#1,CHR$(0);CHR$(160);:FORI=1TO10
- 110 PRINT"[147]":ONIGOSUB1000,2000,3000,4000,5000,6000,7000,8000,9000,10000
- 120 PRINT""HD$:FORJ=0TO15:PRINT#1,CHR$(PEEK(1065+J));:NEXTJ
- 130 PRINT#1,CHR$(BD);CHR$(BG);CHR$(FM);CHR$(FG);
- 140 FORJ=1145TO1945STEP40:FORK=JTOJ+37:PRINT#1,CHR$(PEEK(K));:NEXTK,J,I:CLOSE1
- 150 PRINT"[147]FINISHED.":END
- 160 :
- 999 REM ******************HELP SCREEN 1
- 1000 HD$="[213]SEFUL [193]DDRESSES":BD=6:BG=1:FM=12:FG=0
- 1010 PRINT"[193]DDRESS[221][196]ESCRIPTION"
- 1020 PRINT"[192][192][192][192][192][192][192][219][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 1030 PRINT"43-44[221][208]OINTER: [211]TART OF [194][193][211][201][195] TEXT"
- 1040 PRINT"45-46[221][208]OINTER: [211]TART [194][193][211][201][195] VARIABLES"
- 1050 PRINT"55-56[221][200]IGHEST ADDRESS USED BY [194][193][211][201][195]"
- 1060 PRINT"197[221][195]URRENT KEY PRESSED (64=NONE)"
- 1070 PRINT"198[221][206]O. CHARS IN KEYBOARD BUFFER"
- 1080 PRINT"251-254[221][198]REE ZERO PAGE LOCATIONS"
- 1090 PRINT"646[221][198]OREGROUND (CHARACTER) COLOUR"
- 1095 PRINT"647[221][194]ACKGROUND COLOUR UNDER CURSOR"
- 1100 PRINT"648[221][208]OINTER: [211]CREEN [205]EMORY"
- 1110 PRINT"631-640[221][203]EYBOARD BUFFER (10 BYTES)"
- 1120 PRINT"650[221][203]EY REPEAT: 0=NORMAL,"
- 1130 PRINT"[221] 100=DISABLE, 255=ALL KEYS"
- 1140 PRINT"653[221][211]HIFT/[195]TRL/[195]= [203]EYS, 1=[211]HIFT,"
- 1145 PRINT"[221] 2=[195]OMMODORE, 4=[195]TRL KEY"
- 1150 PRINT"788-789[221][201][210][209] [214]ECTOR (NORMALLY 59953)"
- 1160 PRINT"828- [221][195]ASSETTE BUFFER: CAN USE FOR"
- 1170 PRINT"1023[221] 3 SPRITES (AT 832,896,960)"
- 1200 PRINT"1024-[221][211]CREEN MEMORY (1000 BYTES)"
- 1210 PRINT"55296-[221][195]OLOUR MEMORY (1000 BYTES)"
- 1990 RETURN
- 1998 :
- 1999 REM *****************HELP SCREEN 2
- 2000 HD$="[195]HARACTER [195]ODES ":BD=6:BG=1:FM=12:FG=0
- 2010 PRINT"":TB=3:CH=0:FORB=1146TO1146+24STEP5:FORA=BTOB+720STEP40
- 2020 POKEA+4,93:POKEA,CH:PRINTTAB(TB);CH:CH=CH+1:NEXTA:PRINT"":TB=TB+5:NEXTB
- 2030 AD=1171:FORA=95TO113:POKEAD+5,93:POKEAD,A:AD=AD+40:PRINTTAB(28);A:NEXTA
- 2040 PRINT"":AD=1177:FORA=114TO127:POKEAD,A:AD=AD+40:PRINTTAB(34);A:NEXTA
- 2050 PRINT"[195]ODES 128-255 ARE REVERSED IMAGES OF "
- 2060 PRINT"CODES 0-127, SO ADD 128"
- 2990 RETURN
- 2998 :
- 2999 REM *****************HELP SCREEN 3
- 3000 HD$=" [195]OLOUR ":BD=6:BG=1:FM=12:FG=0
- 3010 PRINT"0 [194]LACK [195][212][210][204] 1 [221] 0123456789012345"
- 3020 PRINT"1 [215]HITE [195][212][210][204] 2 [221] 0 [216][186][216][186][186]*[216][186][186][216][186][186][186][186][186][186]"
- 3030 PRINT"2 [210]ED [195][212][210][204] 3 [221] 1 [186][216][186][216][186][186][186][216]*[186]*[186][186][216][186][186]"
- 3040 PRINT"3 [195]YAN [195][212][210][204] 4 [221] 2 [216][186][216][216]*[216][216][186][186][216][186][216][216][216][216][186]"
- 3050 PRINT"4 [208]URPLE [195][212][210][204] 5 [221] 3 [186][216][216][216][216]*[186][216][216][216][216]*[216][216]*[216]"
- 3060 PRINT"5 [199]REEN [195][212][210][204] 6 [221] 4 [186]*[216][216][216][216][216][216][216][216][216][216][216][216][216]*"
- 3070 PRINT"6 [194]LUE [195][212][210][204] 7 [221] 5 [186]*[216]*[216][216][216][216][216][216][216]*[216][186][216]*"
- 3080 PRINT"7 [217]ELLOW [195][212][210][204] 8 [221] 6 *[186][216][186][216][216][216][216][216][216][216][216][216]*[186][186]"
- 3090 PRINT"8 [207]RANGE [195]= 1 [221] 7 [186][216][186][216][216][216]*[216]*[186]*[186][186][216][216][216]"
- 3100 PRINT"9 [194]ROWN [195]= 2 [221] 8 *[186][186][216][216][216][216][186][216][186][216][216][216][216][216]*"
- 3110 PRINT"10 [204]T [210]ED [195]= 3 [221] 9 [216][186][216][216][216][216][216][186][186][216][186][216][216][216][216][186]"
- 3120 PRINT"11 [199]REY 1 [195]= 4 [221] 10 **[186][216][216][216][216]*[216][186][216][216][216][216][216]*"
- 3130 PRINT"12 [199]REY 2 [195]= 5 [221] 11 [186][186][216]*[216][216][216][186][216][216][216][216][186][186]*[186]"
- 3140 PRINT"13 [204]T [199]REEN [195]= 6 [221] 12 [186][186]*[216][216][216]*[216][216]*[216][186][216][216][216][186]"
- 3150 PRINT"14 [204]T [194]LUE [195]= 7 [221] 13 [186][216][216][216][216][186]*[216][216][216][216][186][216][216][216][216]"
- 3160 PRINT"15 [199]REY 3 [195]= 8 [221] 14 [186][186][216][186][216][216][186][216][216][216][216]*[216][216][216]*"
- 3170 PRINT"[221] 15 [186][186][186][216]**[186][216][216]**[186][186][216]*[216]"
- 3175 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192][192][178][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 3180 PRINT"[208][207][203][197] 646,FOREGROUND [221] [186] = [199][207][207][196] [205][201][216]"
- 3190 PRINT"[208][207][203][197] 53280,BORDER [160][221] * = [198][193][201][210] [205][201][216]"
- 3200 PRINT"[208][207][203][197] 53281,BACKGROUND [221] [216] = [208][207][207][210] [205][201][216]"
- 3990 RETURN
- 3998 :
- 3999 REM *****************HELP SCREEN 4
- 4000 HD$=" [203]EY [208]RESS ":BD=6:BG=1:FM=12:FG=0
- 4010 PRINT"0 [196]EL [221] 21 [198] [221] 42 [204] [221] 63 [206]ONE"
- 4020 PRINT"1 [210]ETURN[221] 22 [212] [221] 43 - [221] 64 [206]O KEY"
- 4030 PRINT"2 [210]IGHT [221] 23 [216] [221] 44 . [221] PRESSED"
- 4040 PRINT"3 [198]7 [221] 24 7 [221] 45 : [221][192][192][192][192][192][192][192][192][192][192][192]"
- 4050 PRINT"4 [198]1 [221] 25 [217] [221] 46 @ [221]197 HOLDS"
- 4060 PRINT"5 [198]3 [221] 26 [199] [221] 47 , [221]A CODED"
- 4070 PRINT"6 [198]5 [221] 27 8 [221] 48 \ [221]VALUE FOR"
- 4080 PRINT"7 [196]OWN [221] 28 [194] [221] 49 * [221]THE CURRENT"
- 4090 PRINT"8 3 [221] 29 [200] [221] 50 ; [221]KEY PRESSED"
- 4100 PRINT"9 [215] [221] 30 [213] [221] 51 [195]LEAR[221][210]EFER TO"
- 4110 PRINT"10 [193] [221] 31 [214] [221] 52 [206]ONE [221]THIS TABLE"
- 4120 PRINT"11 4 [221] 32 9 [221] 53 = [221]FOR THESE"
- 4130 PRINT"12 [218] [221] 33 [201] [221] 54 ^ [221]VALUES."
- 4140 PRINT"13 [211] [221] 34 [202] [221] 55 / [221][201]F MORE"
- 4150 PRINT"14 [197] [221] 35 0 [221] 56 1 [221]THAN ONE"
- 4160 PRINT"15 [206]ONE [221] 36 [205] [221] 57 _ [221]KEY IS"
- 4170 PRINT"16 5 [221] 37 [203] [221] 58 [206]ONE [221]PRESSED THE"
- 4180 PRINT"17 [210] [221] 38 [207] [221] 59 2 [221]HIGHER IS"
- 4190 PRINT"18 [196] [221] 39 [206] [221] 60 [211]PACE[221]STORED."
- 4200 PRINT"19 6 [221] 40 + [221] 61 [206]ONE [221]"
- 4210 PRINT"20 [195] [221] 41 [208] [221] 62 [209] [221]"
- 4990 RETURN
- 4998 :
- 4999 REM *****************HELP SCREEN 5
- 5000 HD$=" [205]EMORY [205]AP ":BD=6:BG=1:FM=12:FG=0
- 5010 PRINT"65535[176][192][192][192][192][192][192][192][192][192][192][192][192][174]$[198][198][198][198][221][195]HARACTER [210][207][205]"
- 5020 PRINT"[221]8[203] [203]ERNAL[210][207][205][221] [221]AT 53248 (4[203])"
- 5030 PRINT"57344[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$[197]000[221] [201]MAGE AT"
- 5040 PRINT"[221][201]NPUT/[207]UTPUT[221] [221] 4096-8191"
- 5050 PRINT"56320[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$[196][195]00[171][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 5060 PRINT"[221][195]OLOUR [210][193][205] [221] [221][207]N POWER UP,"
- 5070 PRINT"55296[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$[196]800[221][214][201][195] [201][201] SEES"
- 5080 PRINT"[221][214][201][195] [201][201] &[160][211][201][196][221] [221]1ST 16[203] [194]ANK"
- 5090 PRINT"53248[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$[196]000[221](0-16383)"
- 5100 PRINT"[221]4[203] [198]REE [210][193][205] [221] [171][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 5110 PRINT"49152[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$[195]000[221]$0001 (1)"
- 5120 PRINT"[221]8[203] [194]ASIC [210][207][205][221] [221]CONTROLS"
- 5130 PRINT"40960[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$[193]000[221]SWITCHING OF"
- 5140 PRINT"[221]38[203] [198]REE [221] [221][210][193][205]"
- 5150 PRINT"16384[221] [213]SER [210][193][205] [221]$4000[221] - BIT 0"
- 5160 PRINT"2048[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$0800[221] [194]ASIC [210][207][205]"
- 5170 PRINT"[221][211]PR [208]OINTERS[221] [221] 0=[210][193][205]"
- 5180 PRINT"[221][212]EXT [211]CREEN [221] [221] 1=[210][207][205] IN"
- 5190 PRINT"1024[171][192][192][192][192][192][192][192][192][192][192][192][192][179]$0400[221] - BIT 1"
- 5200 PRINT"[221][211]YSTEM [205]EM [221] [221] [203]ERNAL [210][207][205]"
- 5210 PRINT"0[173][192][192][192][192][192][192][192][192][192][192][192][192][189]$0000[221] SAME"
- 5990 RETURN
- 5998 :
- 5999 REM *****************HELP SCREEN 6
- 6000 HD$=" [214]IDEO (1) ":BD=6:BG=1:FM=12:FG=0
- 6010 PRINT"53248 [211]PRITE 0 [216] POSITION REGISTER"
- 6020 PRINT"53249 [217] POSITION REGISTER"
- 6030 PRINT"... AND SO ON TO 53263 ([211]PRITE 7 [217])"
- 6040 PRINT"53264 [205]OST [211]IGNIFICANT [194]IT OF [216] POS"
- 6050 PRINT"FOR SPRITES 0-7, BIT 0=SPRITE 0 [205][211][194]"
- 6060 PRINT"... BIT 7=SPRITE 7 [205][211][194]"
- 6070 PRINT"53265 BIT 0-2:VERTICAL SCROLLING"
- 6080 PRINT"BIT 3:SCREEN HEIGHT, 0=24 ROWS"
- 6090 PRINT"1=25 ROWS"
- 6100 PRINT"BIT 4:DISPLAY ON/OFF, 0=OFF"
- 6110 PRINT"1=ON"
- 6120 PRINT"BIT 5:BIT MAP ON/OFF"
- 6130 PRINT"BIT 6:EXTENDED COLOUR ON/OFF"
- 6140 PRINT"BIT 7:[205][211][194] OF RASTER REGISTER"
- 6150 PRINT"53266 [210]ASTER REGISTER. [210]EAD TO FIND"
- 6160 PRINT"CURRENT LINE BEING DRAWN."
- 6170 PRINT"[215]RITE TO GENERATE INTERRUPT."
- 6180 PRINT"53267 [204]IGHT PEN [216] POSITION"
- 6190 PRINT"53268 [204]IGHT PEN [217] POSITION"
- 6200 PRINT"53269 [197]NABLE/DISABLE SPRITES 0-7, EACH"
- 6210 PRINT"BIT EQUIVALENT TO SPRITE NUMBER"
- 6990 RETURN
- 6998 :
- 6999 REM *****************HELP SCREEN 7
- 7000 HD$=" [214]IDEO (2) ":BD=6:BG=1:FM=12:FG=0
- 7005 PRINT"53270 BIT 0-2:HORIZONTAL SCROLLING"
- 7006 PRINT"BIT 3:SCREEN WIDTH"
- 7010 PRINT"BIT 4-5:[211]ET/[210]ESET [205]ULTICOLOUR"
- 7020 PRINT"BIT 6-7:UNUSED"
- 7030 PRINT"53271 [217] EXPANSION OF SPRITES 0-7"
- 7040 PRINT"53272 [204]OCATION OF SCREEN MEMORY,COLOUR"
- 7050 PRINT"MEMORY,CHARACTER MEMORY"
- 7060 PRINT"BIT 1-3:CHARACTER SET POSITION"
- 7070 PRINT"BIT 4-7:SCREEN POSITION"
- 7080 PRINT"(OR COLOUR MEMORY, IF BITMAP ON)"
- 7090 PRINT"53273 [212]YPE OF INTERRUPT WHICH OCCURRED"
- 7100 PRINT"53274 [197]NABLE INTERRUPT TO OCCUR"
- 7110 PRINT"53275 [211]PRITE TO BACKGROUND PRIORITY,"
- 7120 PRINT"EACH BIT EQUIVALENT TO SPRITE NO"
- 7130 PRINT"53276 [211]PRITE HIRES/MULTICOLOUR TOGGLE"
- 7140 PRINT"53277 [216] EXPANSION - SPRITES 0-7"
- 7150 PRINT"53278 [211]PRITE-TO-SPRITE COLLISIONS"
- 7160 PRINT"53279 [211]PRITE-TO-BACKGROUND COLLISIONS"
- 7170 PRINT"53280 [211]CREEN BORDER COLOUR"
- 7180 PRINT"53281 [211]CREEN BACKGROUND COLOUR"
- 7190 PRINT"53287-53294 [211]PRITES 0-7 COLOUR"
- 7990 RETURN
- 7998 :
- 7999 REM *****************HELP SCREEN 8
- 8000 HD$=" [211]OUND ":BD=6:BG=1:FM=12:FG=0
- 8010 PRINT"[214]OICE 1:"
- 8020 PRINT"54272 [198]REQUENCY LOW BYTE (0-255)"
- 8030 PRINT"54273 [198]REQUENCY HIGH BYTE (0-255)"
- 8040 PRINT"54274 [208]ULSE WIDTH LOW BYTE (0-255)"
- 8050 PRINT"54275 [208]ULSE WIDTH HIGH BYTE (0-15)"
- 8060 PRINT"54276 [215]AVEFORM 16=TRIANGLE 64=PULSE"
- 8070 PRINT"32=SAWTOOTH 128=NOISE"
- 8080 PRINT"54277 [193]TTACK/[196]ECAY (USE ATT*16+DEC)"
- 8090 PRINT"54278 [211]USTAIN/[210]ELEASE (SUS*16+REL)"
- 8100 PRINT"[214]OICE 2: 54279-54285 SAME AS ABOVE"
- 8110 PRINT"[214]OICE 3: 54286-54292 SAME AS ABOVE"
- 8120 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 8130 PRINT"54295:BITS 0-2 - FILTER SWITCHES FOR"
- 8140 PRINT"VOICES 1,2,3 0=OFF, 1=FILTER ON"
- 8150 PRINT"BITS 4-7 - RESONANCE SETTING"
- 8160 PRINT"54296:BITS 0-3 - VOLUME (0-15)"
- 8170 PRINT"4 - LOWPASS FILTER"
- 8180 PRINT"5 - BANDPASS"
- 8190 PRINT"6 - HIGHPASS 54297-8"
- 8200 PRINT"54299:OSCILLATOR 3 OUTPUT PADDLES"
- 8210 PRINT"54300:ENVELOPE 3 OUTPUT (PORT 1)"
- 8990 RETURN
- 8998 :
- 8999 REM *****************HELP SCREEN 9
- 9000 HD$=" [196]OS/[208]RINTER ":BD=6:BG=1:FM=12:FG=0
- 9010 PRINT"[207][208][197][206]15,8,15 , THEN:"
- 9020 PRINT"[198]ORMAT : [208][210][201][206][212]#15,"CHR$(34)"[206]0:DISKNAME,ID"CHR$(34)
- 9030 PRINT"[210]ENAME : [208][210][201][206][212]#15,"CHR$(34)"[210]0:NEW=OLD"CHR$(34)
- 9040 PRINT"[211]CRATCH : [208][210][201][206][212]#15,"CHR$(34)"[211]0:FILENAME"CHR$(34)
- 9050 PRINT"[214]ALIDATE : [208][210][201][206][212]#15,"CHR$(34)"[214]0"CHR$(34)
- 9060 PRINT"[201]NITIALISE: [208][210][201][206][212]#15,"CHR$(34)"[201]0"CHR$(34)
- 9070 PRINT"AND [195][204][207][211][197] 15"
- 9080 PRINT"[212]O READ ERROR CHANNEL:"
- 9090 PRINT"[207][208][197][206]15,8,15:[201][206][208][213][212]#15,[197][210],[197][210]$,[212][203],[211][210]"
- 9100 PRINT"[208][210][201][206][212][197][210],[197][210]$,[212][203],[211][210]:[195][204][207][211][197]15"
- 9110 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 9120 PRINT"[197]NHANCE [207]N/[207]FF [195][200][210]$(14)/[195][200][210]$(15)"
- 9130 PRINT"[210]EVERSE [207]N/[207]FF [195][200][210]$(18)/[195][200][210]$(146)"
- 9140 PRINT"[212]AB (N IS TAB POSITION) [195][200][210]$(16);"CHR$(34)"N"CHR$(34)
- 9150 PRINT"[195]ARRIAGE [210]ETURN [195][200][210]$(13)"
- 9160 PRINT"[204]INE [198]EED [195][200][210]$(10)"
- 9170 PRINT"[213]PPERCASE/[199]RAPHICS [207]N [195][200][210]$(34)"
- 9180 PRINT"[213]PPER/[204]OWERCASE [207]N [195][200][210]$(17)"
- 9190 PRINT"[209]UOTE ("CHR$(34)") [195][200][210]$(34)"
- 9200 PRINT"[194]ITMAP [208]RINTING [207]N [195][200][210]$(8)"
- 9210 PRINT"[210]EPEATED [194]IT [201]MAGE [195][200][210]$(26);[195][200][210]$(N)"
- 9990 RETURN
- 9998 :
- 9999 REM ****************HELP SCREEN 10
- 10000 HD$=" [205]ISCELLANEOUS ":BD=6:BG=1:FM=12:FG=0
- 10010 PRINT"[202][207][217][211][212][201][195][203][211]:"
- 10020 PRINT"[208]ORT 1 - [208][197][197][203](56321), 2 - [208][197][197][203](56320)"
- 10030 PRINT"[176][192][192][192][178][192][192][192][178][192][192][192][178][192][192][192][192][178][192][192][192][192][192][178][192][192][192][192][178][192][192][192][192][178][192][192][174]"
- 10040 PRINT"[221] - [221] - [221] - [221][198]IRE[221][210]IGHT[221][204]EFT[221][196]OWN[221][213]P[221]"
- 10050 PRINT"[173][192][192][192][177][192][192][192][177][192][192][192][177][192][192][192][192][177][192][192][192][192][192][177][192][192][192][192][177][192][192][192][192][177][192][192][189]"
- 10060 PRINT" [194][201][212] 7 6 5 4 3 2 1 0"
- 10070 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 10080 PRINT"[208][207][203][197]808,251 [196]ISABLE [210]UN[211]TOP/[210]ESTORE"
- 10090 PRINT"[208][207][203][197]774,131:[208][207][203][197]775,164 [196]ISABLE [204][201][211][212]"
- 10100 PRINT"[208][207][203][197]818,133:[208][207][203][197]819,164 [196]ISABLE [211][193][214][197]"
- 10110 PRINT"[208][207][203][197]774,226:[208][207][203][197]775,252 [210]ESET ON [204][201][211][212]"
- 10115 PRINT"[208][207][203][197]818,226:[208][207][203][197]819,252 [210]ESET ON [211][193][214][197]"
- 10120 PRINT"[208][207][203][197]19,2 [210]EMOVE ? FROM [201][206][208][213][212] PROMPT"
- 10130 PRINT"[208][207][203][197]19,0 [210]ESTORE [201][206][208][213][212] PROMPT"
- 10150 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 10160 PRINT"[212]O STOP DISK DRIVE HEAD BANG, USE:"
- 10170 PRINT"[207][208][197][206]15,8,15,"CHR$(34)"[205]-[215]"CHR$(34)"+[195][200][210]$(106)+[195][200][210]$(0)+"
- 10180 PRINT"+[195][200][210]$(1)+[195][200][210]$(133):[195][204][207][211][197]15"
- 10190 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
- 10200 PRINT"[211][217][211]65126 [215]ARM [211]TART ([210]UN[211]TOP/[210]ESTORE)"
- 10210 PRINT"[211][217][211]64738 [195]OLD [211]TART ([210]ESET)"
- 10990 RETURN
-